home *** CD-ROM | disk | FTP | other *** search
/ IRIX 6.4 Applications 1997 August / SGI IRIX 6.4 Applications 1997 August.iso / dist / mmailp.idb / usr / lib / Zmail / bin / getfilename.z / getfilename
Encoding:
Text File  |  1997-01-22  |  285 b   |  17 lines

  1. #!/bin/csh -fb
  2. # (The "-fb" might need to be changed to "-f" on some systems)
  3. #
  4.  
  5. echo -n "Enter the name of a file in '$1' format: "
  6. set fnam=$<
  7. if ("" == "$fnam") then
  8.     echo Aborted
  9.     exit -1
  10. endif
  11. if (! -r  $fnam) then
  12.     echo No such file
  13.     exit -1
  14. endif
  15. cp $fnam $2
  16. exit 0
  17.